home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / DEV / I-Z / Xlisp_Source.cpt / MacFun1.MEM < prev    next >
Text File  |  1985-12-04  |  1KB  |  56 lines
  1. Macintosh Quickdraw Graphics Functions:
  2.  
  3. (show-graphics)  SHOW THE GRAPHICS WINDOW
  4.     returns    nil
  5.  
  6. (hide-graphics)  HIDE THE GRAPHICS WINDOW
  7.     returns    nil
  8.  
  9. (clear-graphics)  CLEAR THE GRAPHICS WINDOW
  10.     returns    nil
  11.  
  12. (showpen)  SHOW THE DRAWING PEN
  13.     returns    nil
  14.  
  15. (hidepen)  HIDE THE DRAWING PEN
  16.     returns    nil
  17.  
  18. (getpen)  GET THE LOCATION OF THE DRAWING PEN
  19.     returns    location of the pen as a dotted pair
  20.  
  21. (pensize <w> <h>)  SET THE PEN SIZE
  22.     <w>        the width of the pen (integer)
  23.     <h>        the height of the pen (integer)
  24.     returns    nil
  25.  
  26. (penmode <mode>)  SET THE DRAWING MODE
  27.     <mode>    drawing mode (integer)
  28.     returns    nil
  29.  
  30. (penpat <pat>)  SET THE PEN PATTERN
  31.     <pat>    pattern (list of integers)
  32.     returns    nil
  33.  
  34. (pennormal)  SET THE PEN BACK TO NORMAL
  35.     returns    nil
  36.  
  37. (move <dh> <dv>)  MOVE THE PEN (RELATIVE)
  38.     <dh>    change in horizontal position (integer)
  39.     <dv>    change in vertical position (integer)
  40.     returns    nil
  41.  
  42. (moveto <h> <v>)  MOVE THE PEN (ABSOLUTE)
  43.     <h>        horizontal position (integer)
  44.     <v>        vertical position (integer)
  45.     returns    nil
  46.  
  47. (line <dh> <dv>)  DRAW A LINE (RELATIVE)
  48.     <dh>    change in horizontal position (integer)
  49.     <dv>    change in vertical position (integer)
  50.     returns    nil
  51.  
  52. (lineto <h> <v>)  DRAW A LINE (ABSOLUTE)
  53.     <h>        horizontal position (integer)
  54.     <v>        vertical position (integer)
  55.     returns    nil
  56.